home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Graphics Programming (2nd Edition) / Visual Basic Graphics Programming 2nd Edition.iso / OldSrc / CH3 / SRC / DEVINFO.BAS < prev    next >
BASIC Source File  |  1996-04-19  |  5KB  |  102 lines
  1. Attribute VB_Name = "DevInfo"
  2. Option Explicit
  3.  
  4. #If Win32 Then
  5.     Declare Function GetDeviceCaps Lib "gdi32" (ByVal hdc As Long, ByVal nIndex As Long) As Long
  6. #Else
  7.     Declare Function GetDeviceCaps Lib "GDI" (ByVal hdc As Integer, ByVal nIndex As Integer) As Integer
  8. #End If
  9.  
  10. Public Const TECHNOLOGY = 2     ' Device type.
  11. Public Const RASTERCAPS = 38    ' Raster capabilities.
  12. Public Const NUMRESERVED = 106  ' # reserved entries in palette.
  13. Public Const SIZEPALETTE = 104  ' Size of system palette.
  14. Public Const HORZSIZE = 4       ' Horizontal size in millimeters.
  15. Public Const VERTSIZE = 6       ' Vertical size in millimeters.
  16. Public Const HORZRES = 8        ' Horizontal width in pixels.
  17. Public Const VERTRES = 10       ' Vertical width in pixels.
  18. Public Const LOGPIXELSX = 88    ' Logical pixels/inch horizontally.
  19. Public Const LOGPIXELSY = 90    ' Logical pixels/inch horizontally.
  20. Public Const BITSPIXEL = 12     ' # bits per pixel.
  21. Public Const PLANES = 14        ' # color planes.
  22. Public Const NUMBRUSHES = 16    ' # brushes.
  23. Public Const NUMCOLORS = 24     ' # colors in device color table.
  24. Public Const NUMFONTS = 22      ' # fonts.
  25. Public Const NUMMARKERS = 20    ' # markers.
  26. Public Const NUMPENS = 18       ' # pens.
  27. Public Const COLORRES = 108     ' Color resolution.
  28. Public Const CURVECAPS = 28     ' Curve capabilities.
  29. Public Const LINECAPS = 30      ' Line capabilities.
  30. Public Const POLYGONALCAPS = 32 ' Polygon capabilities.
  31. Public Const TEXTCAPS = 34      ' Text capabilities.
  32.  
  33. ' TECHNOLOGY values.
  34. Public Const DT_PLOTTER = 0     ' Vector plotter.
  35. Public Const DT_RASDISPLAY = 1  ' Raster display.
  36. Public Const DT_RASPRINTER = 2  ' Raster printer.
  37. Public Const DT_RASCAMERA = 3   ' Raster camera.
  38. Public Const DT_CHARSTREAM = 4  ' Character-stream, PLP.
  39. Public Const DT_METAFILE = 5    ' Metafile, VDM.
  40. Public Const DT_DISPFILE = 6    ' Display-file.
  41.  
  42. ' RASTERCAPS values.
  43. Public Const RC_BITBLT = 1          ' Can BLT.
  44. Public Const RC_BANDING = 2         ' Supports banding support.
  45. Public Const RC_SCALING = 4         ' Supports scaling support.
  46. Public Const RC_BITMAP64 = 8        ' Supports >64K bitmaps.
  47. Public Const RC_GDI20_OUTPUT = &H10 ' Has 2.0 output calls.
  48. Public Const RC_DI_BITMAP = &H80    ' Supports DIB to memory.
  49. Public Const RC_PALETTE = &H100     ' Supports palettes.
  50. Public Const RC_DIBTODEV = &H200    ' Supports DIBitsToDevice.
  51. Public Const RC_BIGFONT = &H400     ' Supports >64K fonts.
  52. Public Const RC_STRETCHBLT = &H800  ' Supports StretchBlt.
  53. Public Const RC_FLOODFILL = &H1000  ' Supports FloodFill.
  54. Public Const RC_STRETCHDIB = &H2000 ' Supports StretchDIBits.
  55.  
  56. ' CURVECAP values.
  57. Public Const CC_CHORD = 4       ' Chords.
  58. Public Const CC_CIRCLES = 1     ' Circles.
  59. Public Const CC_ELLIPSES = 8    ' Ellipses.
  60. Public Const CC_INTERIORS = 128 ' Can do interiors.
  61. Public Const CC_PIE = 2         ' Pie slices.
  62. Public Const CC_STYLED = 32     ' Styled lines.
  63. Public Const CC_WIDE = 16       ' Wide lines.
  64. Public Const CC_WIDESTYLED = 64 ' Wide styled lines.
  65.  
  66. ' LINECAPS values.
  67. Public Const LC_INTERIORS = 128 ' Interiors.
  68. Public Const LC_MARKER = 4      ' Markers.
  69. Public Const LC_POLYLINE = 2    ' Polylines.
  70. Public Const LC_POLYMARKER = 8  ' Polymarkers.
  71. Public Const LC_STYLED = 32     ' Styled lines.
  72. Public Const LC_WIDE = 16       ' Wide lines.
  73. Public Const LC_WIDESTYLED = 64 ' Wide styled lines.
  74.  
  75. ' POLYGONCAPS values.
  76. Public Const PC_INTERIORS = 128 ' Interiors.
  77. Public Const PC_POLYGON = 1     ' Alternate filled polygons.
  78. Public Const PC_RECTANGLE = 2   ' Rectangles.
  79. Public Const PC_SCANLINE = 8    ' Scanlines.
  80. Public Const PC_STYLED = 32     ' Styled borders.
  81. Public Const PC_WIDE = 16       ' Wide borders.
  82. Public Const PC_WIDESTYLED = 64 ' Wide styled borders.
  83. Public Const PC_WINDPOLYGON = 4 ' Winding number filled polygons.
  84.  
  85. ' TEXTCAPS values.
  86. Public Const TC_CP_STROKE = &H4     ' Stroke clip precision.
  87. Public Const TC_CR_90 = &H8         ' Characters rotated 90 degrees.
  88. Public Const TC_CR_ANY = &H10       ' Characters rotated by any angle.
  89. Public Const TC_EA_DOUBLE = &H200   ' Bold.
  90. Public Const TC_IA_ABLE = &H400     ' Italics.
  91. Public Const TC_OP_CHARACTER = &H1  ' Character output precision.
  92. Public Const TC_OP_STROKE = &H2     ' Stroke output precision.
  93. Public Const TC_RA_ABLE = &H2000    ' Raster fonts.
  94. Public Const TC_SA_CONTIN = &H100   ' Continuously scaled fonts.
  95. Public Const TC_SA_DOUBLE = &H40    ' Fonts scaled by a double.
  96. Public Const TC_SA_INTEGER = &H80   ' Fonts scaled by an integer.
  97. Public Const TC_SF_X_YINDEP = &H20  ' Fonts scaled in the X and Y directions independently.
  98. Public Const TC_SO_ABLE = &H1000    ' Strikeout.
  99. Public Const TC_UA_ABLE = &H800     ' Underline.
  100. Public Const TC_VA_ABLE = &H4000    ' Vector fonts.
  101.  
  102.